module iasing_osse_1dvar

    use iasing_osse, only: &
        JPI4,    &
        JPR4,    &
	     r4a_ids, &
	     r51_dat 

    implicit none
    ! List file
    character(len=256), public, save :: ncfile
    character(len=8)  , public, save :: cinstr
    integer(JPI4), public, save      :: nListObs
    integer(JPI4), allocatable, public, save :: ListObs(:)
    
    ! Netcdf databank variables
    integer :: dbid
    type(r4a_ids), public, save :: db_ids
    type(r51_dat), public, save :: db_dat
    
    ! Humidity units
    integer(JPI4), public, save :: ncdf_q_units = 1
    integer(JPI4), public, save :: ncdf_nlevels = 51
    real(JPR4) :: rp_test


end module
